-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy path4.1.4.1 (a+b sin)^m (A+B sin+C sin^2).nb
More file actions
7466 lines (7351 loc) · 392 KB
/
4.1.4.1 (a+b sin)^m (A+B sin+C sin^2).nb
File metadata and controls
7466 lines (7351 loc) · 392 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
(* Content-type: application/mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 7.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 145, 7]
NotebookDataLength[ 394161, 7457]
NotebookOptionsPosition[ 387375, 7281]
NotebookOutlinePosition[ 389193, 7336]
CellTagsIndexPosition[ 389150, 7333]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[Cell[TextData[{
StyleBox["Rules for integrands of the form ",
FontFamily->"Arial"],
Cell[BoxData[
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}]}], ")"}], "m"],
RowBox[{"(",
RowBox[{"A", "+",
RowBox[{"B", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], "+",
RowBox[{"C", " ",
SuperscriptBox[
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}], "2"]}]}], ")"}]}]],
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9},
3.5193325694253187`*^9, {3.5193415004828687`*^9,
3.5193415113404875`*^9}, {3.5193513965602303`*^9,
3.519351397420232*^9}, {3.5194037839416766`*^9, 3.5194037847117205`*^9},
3.52105258275843*^9, 3.5210531741726685`*^9, {3.521057461672199*^9,
3.5210574760242243`*^9}, {3.521059881564049*^9, 3.521059886088057*^9}, {
3.5213902158895197`*^9, 3.521390217543123*^9}, {3.521390827878595*^9,
3.521390829376197*^9}, {3.5214688792561245`*^9, 3.521468879443325*^9}, {
3.523320201951167*^9, 3.523320202247567*^9}, {3.5288596764894824`*^9,
3.5288596768094826`*^9}, {3.529196266260353*^9,
3.5291962665099535`*^9}, {3.5291997050223927`*^9,
3.5291997052563934`*^9}, {3.529201346457276*^9, 3.529201347252877*^9}, {
3.529285041073242*^9, 3.5292850412632427`*^9}, {3.529285215443486*^9,
3.529285215443486*^9}, {3.5295115356999426`*^9,
3.5295115433443794`*^9}, {3.529521412127842*^9, 3.529521414647986*^9}, {
3.529529429975619*^9, 3.529529432955224*^9}, 3.5340074894011116`*^9,
3.5415537711400824`*^9, {3.5415538409034047`*^9, 3.541553841106205*^9}, {
3.5415564120531206`*^9, 3.5415564206955357`*^9},
3.5415565488341613`*^9, {3.5415605631516123`*^9,
3.5415605860836525`*^9}, {3.541561323247347*^9, 3.5415613234501476`*^9},
3.5416162115728135`*^9, {3.5416506679001875`*^9, 3.541650687980216*^9},
3.560533948494043*^9, 3.560538006319724*^9, {3.5605392374714475`*^9,
3.5605392382814484`*^9}, 3.5606250606115856`*^9, 3.5617573869745255`*^9,
3.561757856045182*^9, {3.561761339582559*^9, 3.5617613636025925`*^9}, {
3.5617652519980364`*^9, 3.561765252188037*^9}, {3.561767460571129*^9,
3.5617674608411293`*^9}, 3.5621081762414055`*^9, {3.5621084468550806`*^9,
3.5621084519718895`*^9}, 3.563340740121106*^9},
FontWeight->"Bold"]
}], "None"]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.4965234353062396`*^9, {3.5193214825316973`*^9, 3.5193214852617016`*^9}, {
3.523316399894187*^9, 3.5233164032341914`*^9}, {3.523318350558202*^9,
3.5233183516382036`*^9}, {3.536542725780803*^9, 3.536542725780803*^9}, {
3.5367764878952584`*^9, 3.5367764886452594`*^9}, {3.544322815209103*^9,
3.5443228192963104`*^9}, {3.5450662624913826`*^9, 3.545066292141424*^9}, {
3.545066402271579*^9, 3.5450664054415827`*^9}, {3.5450834884295015`*^9,
3.5450834895895033`*^9}, {3.5454961263762493`*^9,
3.5454961321462574`*^9}, {3.5454963863166127`*^9,
3.5454964580867133`*^9}, {3.545497046127537*^9, 3.545497046127537*^9}, {
3.5454971130676303`*^9, 3.545497136257663*^9}, 3.545610399977621*^9, {
3.546040778592962*^9, 3.546040778592962*^9}, {3.5461052065706367`*^9,
3.5461052249474688`*^9}, {3.546191339879622*^9, 3.5461913430596266`*^9}, {
3.5462141824067917`*^9, 3.5462142145768366`*^9}, {3.5462145455473003`*^9,
3.5462145601073203`*^9}, {3.5463149785974817`*^9,
3.5463149794195285`*^9}, {3.5488738437683954`*^9,
3.5488738699084315`*^9}, {3.5488890647645535`*^9, 3.548889080804576*^9}, {
3.5505951583099127`*^9, 3.5505951620351257`*^9}, {3.5505952613798075`*^9,
3.5505952630869055`*^9}, {3.5535321133435373`*^9,
3.5535321173537664`*^9}, {3.5536175341411576`*^9,
3.5536175352411594`*^9}, {3.55396599671187*^9, 3.55396599862998*^9}, {
3.560190530310161*^9, 3.560190628512334*^9}, {3.5602162723838596`*^9,
3.5602162793138695`*^9}, {3.5606249190913877`*^9, 3.560624924321395*^9}, {
3.5617663419995623`*^9, 3.5617663705796027`*^9}, {3.5617666456099873`*^9,
3.561766656350003*^9}, {3.562107691486154*^9, 3.5621077390350375`*^9}, {
3.5621080165751247`*^9, 3.5621080185719285`*^9}, {3.5621081511877613`*^9,
3.5621081511877613`*^9}, {3.5633407304210925`*^9, 3.563340730891093*^9}, {
3.575852587746504*^9, 3.575852593256511*^9}, {3.575852659996605*^9,
3.575852659996605*^9}, {3.575852743186721*^9, 3.575852743186721*^9}, {
3.57585284254686*^9, 3.575852895956935*^9}, {3.575853026617118*^9,
3.575853038617135*^9}, {3.575853153907296*^9, 3.575853185757341*^9}, {
3.575853290447487*^9, 3.575853290447487*^9}, {3.5758553923824325`*^9,
3.5758553923824325`*^9}, {3.5758554525725164`*^9,
3.5758554525725164`*^9}, {3.5970138705004473`*^9,
3.5970138744628544`*^9}, {3.6056575343700123`*^9, 3.605657583815083*^9}, {
3.6065871040403147`*^9, 3.6065871339703565`*^9}, {3.6155110435196238`*^9,
3.6155110604796476`*^9}},
TextAlignment->Center,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{Cell[TextData[StyleBox["1:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], ")"}], "m"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"B", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], "+",
RowBox[{"C", " ",
SuperscriptBox[
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}], "2"]}]}], ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.4964645213514385`*^9,
3.4965117206885777`*^9, 3.5192471175756674`*^9, {3.5192587973599553`*^9,
3.5192588081399703`*^9}, {3.519321495105319*^9, 3.5193214991925263`*^9},
3.5193247857072587`*^9, {3.5194051897010813`*^9, 3.5194051902791147`*^9}, {
3.5194055551249824`*^9, 3.5194055708408813`*^9}, {3.519405711316916*^9,
3.51940572904193*^9}, {3.519410772192028*^9, 3.5194107776364374`*^9}, {
3.519413782484516*^9, 3.519413782827717*^9}, {3.519767588664174*^9,
3.519767611128214*^9}, {3.5197937941314034`*^9, 3.519793794568204*^9}, {
3.5197947626591043`*^9, 3.519794764749508*^9}, {3.519794865354085*^9,
3.519794874355301*^9}, {3.523218063086026*^9, 3.523218070356036*^9}, {
3.523316514684347*^9, 3.523316514684347*^9}, {3.5233165475343933`*^9,
3.5233165475343933`*^9}, {3.5233184331871357`*^9,
3.5233184334271364`*^9}, {3.5273599103435545`*^9, 3.527359910608755*^9}, {
3.5326424241029196`*^9, 3.53264242435292*^9}, {3.5326584126048727`*^9,
3.532658412794873*^9}, {3.532726454021428*^9, 3.5327264542814283`*^9}, {
3.5327554047263184`*^9, 3.532755404993334*^9}, {3.532798666112293*^9,
3.532798676322307*^9}, {3.5328778343810363`*^9, 3.5328778343810363`*^9},
3.5330758294771795`*^9, {3.5330827570868783`*^9, 3.533082757336879*^9}, {
3.534975097668671*^9, 3.534975097888672*^9}, {3.536863459221404*^9,
3.536863459439804*^9}, {3.540264711953947*^9, 3.5402647253239655`*^9}, {
3.540264783504047*^9, 3.540264783504047*^9}, {3.540502117527218*^9,
3.540502117997218*^9}, {3.540502551737826*^9, 3.540502551937826*^9}, {
3.5449015667548094`*^9, 3.5449015920048447`*^9}, {3.544901714065016*^9,
3.544901727955035*^9}, 3.544911958524931*^9, {3.5449122781717815`*^9,
3.5449122781717815`*^9}, {3.5455187047402697`*^9,
3.5455187052402706`*^9}, {3.545518898070541*^9, 3.545518911130559*^9}, {
3.5455202868524847`*^9, 3.5455202868524847`*^9}, {3.545520317832528*^9,
3.545520339272558*^9}, {3.545520578812894*^9, 3.545520601212925*^9}, {
3.545520817443228*^9, 3.545520820373232*^9}, {3.545578383065389*^9,
3.545578398615411*^9}, {3.5461099987254543`*^9, 3.54611000814787*^9}, {
3.546110085383606*^9, 3.546110115616459*^9}, {3.546113143676578*^9,
3.5461131599162064`*^9}, {3.546113861589839*^9, 3.546113902539911*^9}, {
3.546114166008774*^9, 3.546114166008774*^9}, {3.5461157697071905`*^9,
3.546115770081591*^9}, {3.546881285463888*^9, 3.546881338233962*^9},
3.5468817383245225`*^9, {3.546881986034869*^9, 3.546881986034869*^9}, {
3.5468892568770494`*^9, 3.546889259477053*^9}, {3.5470661850482807`*^9,
3.5470661850482807`*^9}, {3.5470663601085253`*^9,
3.5470663608385267`*^9}, {3.547079095010357*^9, 3.547079106460373*^9}, {
3.5484290087137384`*^9, 3.54842903151377*^9}, {3.5484291151438875`*^9,
3.5484291151438875`*^9}, {3.5484293453342104`*^9, 3.548429355144224*^9},
3.579114203709861*^9, {3.5791143627700834`*^9, 3.5791143687500916`*^9}, {
3.57911459578041*^9, 3.579114597880412*^9}, 3.5791156627319036`*^9,
3.5791158543421717`*^9, {3.5791163348228445`*^9, 3.579116336532847*^9}, {
3.5791165898832016`*^9, 3.579116601023217*^9}, {3.5791169604437203`*^9,
3.5791169647537265`*^9}, 3.579131267059452*^9, 3.6065871732304115`*^9,
3.606606236693779*^9, {3.606606335053917*^9, 3.606606335073917*^9}, {
3.60660658723427*^9, 3.60660658725427*^9}, 3.6085719232445555`*^9, {
3.615511060489648*^9, 3.6155110605096474`*^9}, {3.660089058073769*^9,
3.6600890583707867`*^9}, {3.6602565425617256`*^9,
3.6602565725847683`*^9}, {3.660256837185191*^9, 3.660256837395191*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell["Derivation: Algebraic simplification", "Subsubsection",
CellChangeTimes->{
3.4964418130913677`*^9, {3.496442428087432*^9, 3.4964424330170403`*^9},
3.496528894323882*^9, 3.4975761400971813`*^9, {3.4975778216221414`*^9,
3.497577829892153*^9}, {3.4975827089309845`*^9, 3.4975827138509912`*^9},
3.497639710530856*^9, 3.4976397495153246`*^9, 3.4976637968549566`*^9, {
3.497664121273126*^9, 3.4976641274819374`*^9}, {3.4976641823940334`*^9,
3.497664184390837*^9}, 3.497664250254153*^9, 3.497664775694276*^9,
3.4976649459685745`*^9, {3.49876308829488*^9, 3.4987630935048876`*^9}, {
3.4987648355173264`*^9, 3.498764841027334*^9}, {3.4991797271436334`*^9,
3.4991797277208347`*^9}, {3.4992121758819084`*^9, 3.499212176211909*^9}, {
3.4993573070196304`*^9, 3.4993573078152323`*^9}, 3.5013524902049417`*^9,
3.501621399618896*^9, 3.5016217326739454`*^9, 3.5016376139935837`*^9,
3.5016377276810865`*^9, {3.5017223219869995`*^9, 3.501722324888605*^9}, {
3.501722402935542*^9, 3.5017224033411427`*^9}, 3.5017229817901583`*^9,
3.5017231707844906`*^9, 3.5017234546797895`*^9, {3.5017235643791823`*^9,
3.501723566750386*^9}, {3.5017237232810616`*^9, 3.5017237250750647`*^9}, {
3.5027664855216804`*^9, 3.5027664896088877`*^9}}],
Cell["Rule:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.4964417379912624`*^9, 3.4964417471112747`*^9}, {
3.496441910111503*^9, 3.4964419275315275`*^9}, 3.496451213764926*^9,
3.496528833243797*^9, {3.4975777080419827`*^9, 3.4975777244120054`*^9}, {
3.4975778737222147`*^9, 3.4975778945722437`*^9}, {3.4976396822792068`*^9,
3.49763968986082*^9}, {3.497639771433363*^9, 3.49763978104298*^9}, {
3.4976638984111347`*^9, 3.4976639153215647`*^9}, {3.4976645939383564`*^9,
3.497664598805565*^9}, {3.4976646480080514`*^9, 3.4976646992229414`*^9}, {
3.4976647966763124`*^9, 3.497664832415975*^9}, 3.497664903037299*^9, {
3.4986779242986293`*^9, 3.498677947778662*^9}, {3.499179738750054*^9,
3.499179740902858*^9}, {3.499213316063504*^9, 3.4992133345435305`*^9}, {
3.499358051967739*^9, 3.4993580717017736`*^9}, {3.4993638312082148`*^9,
3.499363839028226*^9}, {3.499368533262825*^9, 3.499368534762827*^9}, {
3.500319714354707*^9, 3.500319719674714*^9}, {3.500321207536797*^9,
3.5003212188668127`*^9}, {3.501358653573163*^9, 3.5013586559531665`*^9}, {
3.502678432393256*^9, 3.5026784351732597`*^9}, {3.502766589293062*^9,
3.502766589293062*^9}, 3.5027671790052986`*^9, 3.5027674748646183`*^9, {
3.5038569856949825`*^9, 3.503856992059794*^9}, {3.504031357905302*^9,
3.5040313587633038`*^9}, 3.5040317449575815`*^9, {3.504311260541732*^9,
3.504311260711732*^9}, {3.504750498076647*^9, 3.50475050021665*^9}, {
3.5092408217803926`*^9, 3.509240824151596*^9}, {3.510164009908225*^9,
3.510164009908225*^9}, {3.5117214107451816`*^9, 3.5117214107451816`*^9}, {
3.5120768665233393`*^9, 3.5120768665233393`*^9}, {3.5121850888428593`*^9,
3.5121850938972683`*^9}, 3.546877116548052*^9, {3.5468800973122253`*^9,
3.5468800973122253`*^9}, {3.547066202678305*^9, 3.547066202678305*^9}, {
3.5470791133403826`*^9, 3.5470791133403826`*^9}, {3.548429141033924*^9,
3.548429141033924*^9}, {3.5484293653942385`*^9, 3.5484293653942385`*^9}, {
3.579114380250108*^9, 3.579114380250108*^9}, {3.5791166075432262`*^9,
3.5791166084532275`*^9}, 3.6602566635878973`*^9}],
Cell[BoxData[
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], ")"}], "m"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"B", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], "+",
RowBox[{"C", " ",
SuperscriptBox[
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}], "2"]}]}], ")"}],
RowBox[{"\[DifferentialD]",
RowBox[{"x", " ", "\[LongRightArrow]", " ",
FractionBox["1", "b"]}]}], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], ")"}],
RowBox[{"m", "+", "1"}]], " ",
RowBox[{"(",
RowBox[{"B", "+",
RowBox[{"C", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}]}], ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9,
3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9,
3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9,
3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9,
3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9},
3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.496441851501421*^9,
3.496441872881451*^9}, {3.496528916553913*^9, 3.4965289272239285`*^9}, {
3.497576165747217*^9, 3.4975761801372375`*^9}, {3.497577761382057*^9,
3.4975777938921027`*^9}, 3.49763959300025*^9, 3.497639634480723*^9,
3.4976398417426867`*^9, {3.49766381031778*^9, 3.4976638350282235`*^9}, {
3.49766435104593*^9, 3.497664390373599*^9}, {3.4976647278489914`*^9,
3.4976647419046164`*^9}, {3.497664869980841*^9, 3.497664887437272*^9}, {
3.498761171082196*^9, 3.498761171082196*^9}, {3.4987645684369526`*^9,
3.4987646442070584`*^9}, {3.49883740188522*^9, 3.4988375207310295`*^9}, {
3.498837939529365*^9, 3.498837958467798*^9}, 3.498875518717125*^9, {
3.4991794250335026`*^9, 3.499179452879552*^9}, {3.4991796787211485`*^9,
3.499179681529153*^9}, {3.4991961982482667`*^9, 3.4991962392763386`*^9}, {
3.499196653100665*^9, 3.4991966955639396`*^9}, {3.499197135282312*^9,
3.499197176918785*^9}, {3.499197690444487*^9, 3.499197694048094*^9}, {
3.499212356332161*^9, 3.4992123865622034`*^9}, {3.499212421412252*^9,
3.499212423032254*^9}, {3.4992126233625345`*^9, 3.499212696332637*^9}, {
3.499357348905704*^9, 3.4993574380910606`*^9}, {3.499404301116287*^9,
3.49940430323629*^9}, {3.4994048006769867`*^9, 3.4994048025069895`*^9}, {
3.5003179811489162`*^9, 3.5003179814297166`*^9}, 3.5003181853432746`*^9, {
3.5003185563630857`*^9, 3.500318557803087*^9}, {3.5013586287231283`*^9,
3.5013586400931444`*^9}, {3.5027658915998363`*^9, 3.502765896981846*^9}, {
3.5027668222170715`*^9, 3.50276686143554*^9}, {3.505344692893856*^9,
3.5053446929038563`*^9}, {3.5092397382492895`*^9,
3.5092398121778193`*^9}, {3.51016418932094*^9, 3.5101642175257893`*^9}, {
3.515189878545912*^9, 3.515189880095914*^9}, {3.5468767933175993`*^9,
3.5468767933275995`*^9}, {3.5468768261776457`*^9, 3.546876840807666*^9}, {
3.54842903831378*^9, 3.548429042463786*^9}, 3.548429073373829*^9,
3.6066062411137857`*^9, {3.6066063350839167`*^9, 3.606606335123917*^9},
3.6066063822639832`*^9, {3.60660658727427*^9, 3.60660658730427*^9}, {
3.606606778864538*^9, 3.6066067821445427`*^9}, {3.6155110605596476`*^9,
3.6155110605996475`*^9}, {3.6602565789867773`*^9, 3.6602566264598446`*^9}},
TextAlignment->Center,
FontSize->12,
FontWeight->"Bold"],
Cell["Program code:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9,
3.492805165713872*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"b_.", "*",
RowBox[{"sin", "[",
RowBox[{"e_.", "+",
RowBox[{"f_.", "*", "x_"}]}], "]"}]}], ")"}], "^", "m_."}], "*",
RowBox[{"(",
RowBox[{
RowBox[{"B_.", "*",
RowBox[{"sin", "[",
RowBox[{"e_.", "+",
RowBox[{"f_.", "*", "x_"}]}], "]"}]}], "+",
RowBox[{"C_.", "*",
RowBox[{
RowBox[{"sin", "[",
RowBox[{"e_.", "+",
RowBox[{"f_.", "*", "x_"}]}], "]"}], "^", "2"}]}]}], ")"}]}], ",",
"x_Symbol"}], "]"}], " ", ":=", "\n", " ",
RowBox[{
RowBox[{
RowBox[{"1", "/", "b"}], "*",
RowBox[{"Int", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"b", "*",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", "*", "x"}]}], "]"}]}], ")"}], "^",
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}]}], "*",
RowBox[{"(",
RowBox[{"B", "+",
RowBox[{"C", "*",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", "*", "x"}]}], "]"}]}]}], ")"}]}], ",", "x"}],
"]"}]}], " ", "/;", "\n",
RowBox[{"FreeQ", "[",
RowBox[{
RowBox[{"{",
RowBox[{"b", ",", "e", ",", "f", ",", "B", ",", "C", ",", "m"}], "}"}],
",", "x"}], "]"}]}]}]], "Code",
CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9},
3.496441834031397*^9, 3.496442095051762*^9, 3.496528791863739*^9,
3.496528888643874*^9, 3.497575939976901*^9, 3.4975761146971455`*^9,
3.4975775509417624`*^9, 3.497577752792045*^9, 3.4975834953320856`*^9,
3.4976395861674376`*^9, 3.4976397432129135`*^9, 3.4976633737510133`*^9,
3.497663791067346*^9, 3.497664242469739*^9, {3.49766439658241*^9,
3.497664398470013*^9}, 3.497664769079864*^9, {3.4986774515679674`*^9,
3.49867746046798*^9}, {3.498761171092196*^9, 3.4987611711021957`*^9}, {
3.4987647642072268`*^9, 3.4987647797772484`*^9}, {3.4987662584793186`*^9,
3.498766258909319*^9}, {3.4987729599087005`*^9, 3.4987729607687016`*^9},
3.4988018581019883`*^9, {3.499179579551774*^9, 3.4991796094414263`*^9}, {
3.499179689157567*^9, 3.499179691637971*^9}, {3.4991797663621025`*^9,
3.499179767407304*^9}, {3.499179868308281*^9, 3.499179869805884*^9},
3.499180259000168*^9, {3.499197395157969*^9, 3.499197401054779*^9}, {
3.499212499112361*^9, 3.49921251269238*^9}, {3.499212715522664*^9,
3.4992127382126956`*^9}, {3.4992128038327875`*^9,
3.4992128061327906`*^9}, {3.499213982604438*^9, 3.499214025174497*^9}, {
3.499214066304555*^9, 3.499214072114563*^9}, {3.4992145411652193`*^9,
3.4992145475152283`*^9}, 3.4993574899767523`*^9, {3.4993576909831047`*^9,
3.4993577157403483`*^9}, 3.4993578086385117`*^9, {3.4993579390391407`*^9,
3.4993579651067867`*^9}, {3.4993580774113836`*^9, 3.4993580785501857`*^9},
3.4993638009881725`*^9, {3.4993661760314975`*^9, 3.4993661794315023`*^9},
3.4993699436547995`*^9, 3.499369995914872*^9, {3.5003179814609165`*^9,
3.5003179817417173`*^9}, 3.5003186747732515`*^9, {3.5003187057132945`*^9,
3.5003187115933027`*^9}, {3.5003194495843363`*^9, 3.500319453664342*^9}, {
3.5003198135348454`*^9, 3.5003198411248837`*^9}, 3.500320756016165*^9,
3.50052634660607*^9, {3.501043281866661*^9, 3.5010432838407745`*^9}, {
3.501358610383103*^9, 3.5013586217531185`*^9}, {3.5026774770619183`*^9,
3.5026774832519274`*^9}, {3.502677757052311*^9, 3.502677762832319*^9}, {
3.502765679626664*^9, 3.502765694945891*^9}, {3.502766916862438*^9,
3.5027669304188614`*^9}, 3.5027671021907635`*^9, {3.503071895268139*^9,
3.5030719155981674`*^9}, {3.50351615772817*^9, 3.5035161598181725`*^9}, {
3.503856818447089*^9, 3.503856835341919*^9}, {3.5053446929138565`*^9,
3.5053446929338565`*^9}, {3.5092398129578204`*^9,
3.5092399297864256`*^9}, {3.509240858050456*^9, 3.509240876630089*^9}, {
3.5094733331253176`*^9, 3.509473337703579*^9}, 3.509475176411747*^9,
3.5094752858760085`*^9, 3.5099379677634096`*^9, 3.5099380908635817`*^9, {
3.510162512862395*^9, 3.5101625133303957`*^9}, {3.510164194515749*^9,
3.5101642104433775`*^9}, 3.5101666942815046`*^9, {3.5120759144259744`*^9,
3.512075914615975*^9}, {3.5159797216064987`*^9, 3.515979724586104*^9},
3.5168207803566356`*^9, {3.517001932668499*^9, 3.5170019351801033`*^9},
3.541093952665062*^9, {3.541095139791547*^9, 3.541095141039549*^9},
3.5413120604445763`*^9, {3.545492120309139*^9, 3.5454921203191385`*^9}, {
3.546876866337702*^9, 3.546876923417782*^9}, {3.546876967297843*^9,
3.5468769759678555`*^9}, {3.5468791720509295`*^9, 3.546879173100931*^9}, {
3.5468804604227333`*^9, 3.546880463732738*^9}, 3.546880992343478*^9,
3.5470662550883784`*^9, 3.5470790756403294`*^9, {3.5470792239905376`*^9,
3.54707922567054*^9}, {3.548429051213798*^9, 3.5484290582238083`*^9}, {
3.548429162483954*^9, 3.5484291650039577`*^9}, {3.548429377794256*^9,
3.5484293786542573`*^9}, {3.57911661765324*^9, 3.5791166354432654`*^9},
3.5792333879762955`*^9, {3.606606335143917*^9, 3.6066063600139523`*^9}, {
3.6066063975140047`*^9, 3.606606405174015*^9}, {3.6066065873242702`*^9,
3.6066066188343143`*^9}, {3.606606812844586*^9, 3.606606817344592*^9}, {
3.6066068498346376`*^9, 3.6066068540046434`*^9}, 3.611879156218178*^9, {
3.6155110804396753`*^9, 3.615511129849745*^9}, {3.6602566685109043`*^9,
3.660256767098091*^9}},
Background->GrayLevel[0.85]],
Cell["", "Subsubsection",
CellDingbat->None,
CellChangeTimes->{3.4796643211106243`*^9}]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{Cell[TextData[StyleBox["2.",
FontFamily->"Arial"]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], ")"}], "m"],
RowBox[{"(",
RowBox[{"A", "+",
RowBox[{"C", " ",
SuperscriptBox[
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}], "2"]}]}], ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.4964645213514385`*^9,
3.5192470594155855`*^9, {3.519247288125906*^9, 3.5192473207459517`*^9}, {
3.519250976620308*^9, 3.5192509795375133`*^9}, 3.5192520188581386`*^9, {
3.5193215829334736`*^9, 3.519321595725496*^9}, {3.5194112531544743`*^9,
3.5194112537784753`*^9}, {3.519411537636574*^9, 3.519411568711828*^9}, {
3.519793882583559*^9, 3.519793883878361*^9}, {3.5214731238817034`*^9,
3.521473124371704*^9}, {3.523316505044334*^9, 3.523316505044334*^9}, {
3.5233184226511183`*^9, 3.523318422861119*^9}, 3.5328367822219863`*^9, {
3.5328742732655816`*^9, 3.5328742968684235`*^9}, {3.532874332701686*^9,
3.532874341843302*^9}, {3.532874546156861*^9, 3.532874552443672*^9}, {
3.5328756408887835`*^9, 3.5328756426671867`*^9}, {3.5328756840852594`*^9,
3.532875690340871*^9}, {3.5328775995694237`*^9, 3.532877607619038*^9}, {
3.5330804511936502`*^9, 3.5330804511936502`*^9}, {3.5330827213068285`*^9,
3.5330827218568287`*^9}, {3.5368634501889877`*^9,
3.5368634503449883`*^9}, {3.537654628221073*^9, 3.537654628221073*^9}, {
3.5376556650325246`*^9, 3.5376556690825305`*^9}, {3.5376558319727583`*^9,
3.537655832122759*^9}, {3.5403190180369616`*^9, 3.540319018277975*^9}, {
3.540320078404611*^9, 3.5403200969116697`*^9}, {3.54497301407633*^9,
3.5449730147315316`*^9}, {3.5449730455259857`*^9, 3.54497310485289*^9},
3.5449734027198133`*^9, {3.544973705703545*^9, 3.5449737123023567`*^9}, {
3.5449743847103376`*^9, 3.5449743847103376`*^9}, {3.5449897190542192`*^9,
3.5449897371142445`*^9}, 3.54501330464754*^9, 3.5450140205483975`*^9, {
3.5450140745556927`*^9, 3.545014074867693*^9}, {3.545014174442668*^9,
3.5450141765018716`*^9}, 3.5450143633121996`*^9, {3.5450664467216406`*^9,
3.5450664468916407`*^9}, {3.5450708578278165`*^9, 3.545070858737818*^9}, {
3.5454157832263145`*^9, 3.5454158086387587`*^9}, {3.5454159825478644`*^9,
3.54541600849071*^9}, {3.5454302617354054`*^9, 3.5454302618654056`*^9},
3.5454968316872363`*^9, {3.545499279040663*^9, 3.545499279340663*^9}, {
3.5454995447410345`*^9, 3.5454995452610354`*^9}, 3.54550074137271*^9, {
3.54550107702318*^9, 3.5455010772431803`*^9}, 3.5455014895037575`*^9,
3.5455017531441264`*^9, {3.5455036281367517`*^9, 3.545503628336752*^9},
3.545520129082264*^9, {3.5455208855433235`*^9, 3.545520885973324*^9}, {
3.545520964293433*^9, 3.5455210208435125`*^9}, {3.545529041549029*^9,
3.545529065459062*^9}, {3.5455293083994026`*^9, 3.5455293521794634`*^9}, {
3.5455294046695375`*^9, 3.5455294056895385`*^9}, {3.5455295327397165`*^9,
3.5455295327397165`*^9}, {3.545577377053981*^9, 3.5455774501340833`*^9},
3.545577510944168*^9, 3.546115756337967*^9, 3.5468835263890266`*^9, {
3.5468896017375326`*^9, 3.546889622177561*^9}, {3.547236869117025*^9,
3.5472368693270254`*^9}, {3.579114108869728*^9, 3.5791141240197487`*^9}, {
3.579117183967235*^9, 3.5791172199372854`*^9}, {3.579117413977557*^9,
3.579117413977557*^9}, 3.579131268779454*^9, 3.606587174420413*^9, {
3.6066062527038016`*^9, 3.606606257233808*^9}, {3.6066063351939173`*^9,
3.6066063352039175`*^9}, {3.6066064287940483`*^9,
3.6066064287940483`*^9}, {3.6066065873842707`*^9, 3.6066065873842707`*^9},
3.608571925044558*^9, {3.6155110606896477`*^9, 3.615511060709648*^9}, {
3.660089065278181*^9, 3.66008908781647*^9}, {3.660098670900592*^9,
3.66009868958066*^9}, {3.6602568389251933`*^9, 3.6602568391051936`*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t",
RowBox[{Cell[TextData[StyleBox["1:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], ")"}], "m"],
RowBox[{"(",
RowBox[{"A", "+",
RowBox[{"C", " ",
SuperscriptBox[
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}], "2"]}]}], ")"}],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"A", " ",
RowBox[{"(",
RowBox[{"m", "+", "2"}], ")"}]}], "+",
RowBox[{"C",
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}]}]}], "\[Equal]", "0"}]]]],
"None"]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.4964645213514385`*^9,
3.4965117206885777`*^9, 3.5192471175756674`*^9, {3.5192587973599553`*^9,
3.5192588081399703`*^9}, {3.519321495105319*^9, 3.5193214991925263`*^9},
3.5193247857072587`*^9, {3.5194051897010813`*^9, 3.5194051902791147`*^9}, {
3.5194055551249824`*^9, 3.5194055708408813`*^9}, {3.519405711316916*^9,
3.51940572904193*^9}, {3.519410772192028*^9, 3.5194107776364374`*^9}, {
3.519413782484516*^9, 3.519413782827717*^9}, {3.519767588664174*^9,
3.519767611128214*^9}, {3.5197937941314034`*^9, 3.519793794568204*^9}, {
3.5197947626591043`*^9, 3.519794764749508*^9}, {3.519794865354085*^9,
3.519794874355301*^9}, {3.523218063086026*^9, 3.523218070356036*^9}, {
3.523316514684347*^9, 3.523316514684347*^9}, {3.5233165475343933`*^9,
3.5233165475343933`*^9}, {3.5233184331871357`*^9,
3.5233184334271364`*^9}, {3.5273599103435545`*^9, 3.527359910608755*^9}, {
3.5326424241029196`*^9, 3.53264242435292*^9}, {3.5326584126048727`*^9,
3.532658412794873*^9}, {3.532726454021428*^9, 3.5327264542814283`*^9}, {
3.5327554047263184`*^9, 3.532755404993334*^9}, {3.532798666112293*^9,
3.532798676322307*^9}, {3.5328778343810363`*^9, 3.5328778343810363`*^9},
3.5330758294771795`*^9, {3.5330827570868783`*^9, 3.533082757336879*^9}, {
3.534975097668671*^9, 3.534975097888672*^9}, {3.536863459221404*^9,
3.536863459439804*^9}, {3.540264711953947*^9, 3.5402647253239655`*^9}, {
3.540264783504047*^9, 3.540264783504047*^9}, {3.540502117527218*^9,
3.540502117997218*^9}, {3.540502551737826*^9, 3.540502551937826*^9}, {
3.5449015667548094`*^9, 3.5449015920048447`*^9}, {3.544901714065016*^9,
3.544901727955035*^9}, 3.544911958524931*^9, {3.5449122781717815`*^9,
3.5449122781717815`*^9}, {3.5455187047402697`*^9,
3.5455187052402706`*^9}, {3.545518898070541*^9, 3.545518911130559*^9}, {
3.5455202868524847`*^9, 3.5455202868524847`*^9}, {3.545520317832528*^9,
3.545520339272558*^9}, {3.545520578812894*^9, 3.545520601212925*^9}, {
3.545520817443228*^9, 3.545520820373232*^9}, {3.545578383065389*^9,
3.545578398615411*^9}, {3.5461099987254543`*^9, 3.54611000814787*^9}, {
3.546110085383606*^9, 3.546110115616459*^9}, {3.546113143676578*^9,
3.5461131599162064`*^9}, {3.546113861589839*^9, 3.546113902539911*^9}, {
3.546114166008774*^9, 3.546114166008774*^9}, {3.5461157697071905`*^9,
3.546115770081591*^9}, {3.546881285463888*^9, 3.546881338233962*^9},
3.5468817120044856`*^9, {3.546881961574835*^9, 3.546881961574835*^9}, {
3.5468888776065187`*^9, 3.546888877866519*^9}, 3.5468894778073587`*^9, {
3.5468896374375825`*^9, 3.5468896376275826`*^9}, 3.5472370273872466`*^9,
3.5472372810876017`*^9, {3.547237346987694*^9, 3.5472373589577107`*^9},
3.5484290277237654`*^9, {3.5500094804472303`*^9, 3.5500094804472303`*^9},
3.579114206249864*^9, {3.5791143299900374`*^9, 3.5791143387100496`*^9},
3.57911439614013*^9, 3.579115671421916*^9, 3.579115855142173*^9, {
3.579116407332946*^9, 3.579116422102967*^9}, {3.5791174579576187`*^9,
3.579117458127619*^9}, {3.579117497047673*^9, 3.5791175012076793`*^9},
3.579131269859456*^9, 3.6065871757004147`*^9, 3.6066062737338314`*^9, {
3.606606335643918*^9, 3.606606335653918*^9}, {3.606606498044145*^9,
3.606606498044145*^9}, {3.6066065878242707`*^9, 3.6066065878342705`*^9},
3.6085719267645607`*^9, {3.6155110612196484`*^9, 3.615511061239649*^9}, {
3.6600890676293163`*^9, 3.660089090095601*^9}, {3.6600987613787665`*^9,
3.660098761903797*^9}, {3.660098839571239*^9, 3.6600988478167105`*^9}, {
3.6601006657456903`*^9, 3.660100692703232*^9}, {3.6968921820080853`*^9,
3.696892182232098*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell[TextData[{
"Derivation: Nondegenerate sine recurrence 1a with ",
Cell[BoxData[
RowBox[{
RowBox[{"n", "\[Rule]", "0"}], ",",
RowBox[{"p", "\[Rule]", "0"}]}]]]
}], "Subsubsection",
CellChangeTimes->{
3.4964418130913677`*^9, {3.496442428087432*^9, 3.4964424330170403`*^9},
3.496528894323882*^9, 3.4975761400971813`*^9, {3.4975778216221414`*^9,
3.497577829892153*^9}, {3.4975827089309845`*^9, 3.4975827138509912`*^9},
3.497639710530856*^9, 3.4976397495153246`*^9, 3.4976637968549566`*^9, {
3.497664121273126*^9, 3.4976641274819374`*^9}, {3.4976641823940334`*^9,
3.497664184390837*^9}, 3.497664250254153*^9, 3.497664775694276*^9,
3.4976649459685745`*^9, {3.49876308829488*^9, 3.4987630935048876`*^9}, {
3.4987648355173264`*^9, 3.498764841027334*^9}, {3.4991797271436334`*^9,
3.4991797277208347`*^9}, {3.4992121758819084`*^9, 3.499212176211909*^9}, {
3.4993573070196304`*^9, 3.4993573078152323`*^9}, 3.5013524902049417`*^9,
3.501621399618896*^9, 3.5016217326739454`*^9, 3.5016376139935837`*^9,
3.5016377276810865`*^9, {3.5017223219869995`*^9, 3.501722324888605*^9}, {
3.501722402935542*^9, 3.5017224033411427`*^9}, 3.5017229817901583`*^9,
3.5017231707844906`*^9, 3.5017234546797895`*^9, {3.5017235643791823`*^9,
3.501723566750386*^9}, {3.5017250640438175`*^9, 3.5017250769294395`*^9}, {
3.501725550171871*^9, 3.501725550671072*^9}, {3.5017278201126595`*^9,
3.501727826898671*^9}, {3.5017278619207325`*^9, 3.5017279153196263`*^9}, {
3.501727996595769*^9, 3.50172799715737*^9}, {3.501728047857459*^9,
3.501728055751073*^9}, {3.5017281686076717`*^9, 3.501728169060073*^9}, {
3.5017287195538397`*^9, 3.50172872538825*^9}, {3.50172921540071*^9,
3.5017292168983135`*^9}, {3.501729246943966*^9, 3.5017292537299776`*^9}, {
3.5017295437928877`*^9, 3.5017295745093417`*^9}, {3.5017296960647554`*^9,
3.501729696314356*^9}, {3.5017298761514716`*^9, 3.5017298771342735`*^9}, {
3.501729942248788*^9, 3.501729967068431*^9}, {3.5017301202763004`*^9,
3.501730120603901*^9}, {3.501730162162374*^9, 3.5017301694943867`*^9}, {
3.5017304653801064`*^9, 3.501730494037357*^9}, {3.501730604179551*^9,
3.5017306171587734`*^9}, {3.5034185653536963`*^9,
3.5034185683937006`*^9}, {3.5034226237593784`*^9, 3.5034226290093856`*^9},
3.5053451044944324`*^9, {3.509482100959809*^9, 3.509482110306343*^9},
3.5120745501540403`*^9, 3.5141617710379753`*^9, 3.5146489464527893`*^9,
3.5165648188978043`*^9, {3.516564852032263*^9, 3.516564854543867*^9}, {
3.5468781337194757`*^9, 3.5468781337194757`*^9}, {3.5492380822994175`*^9,
3.5492380913959374`*^9}, {3.5630499188890886`*^9, 3.563049921919093*^9},
3.6066063387039223`*^9, 3.606606590004274*^9, {3.606607392995398*^9,
3.606607397065404*^9}, {3.6066074284754477`*^9, 3.6066074489654765`*^9}, {
3.6066077809259415`*^9, 3.606607793845959*^9}, {3.6066078453160315`*^9,
3.6066078455760317`*^9}, {3.6066078940660996`*^9, 3.606607894976101*^9}, {
3.606607988616232*^9, 3.606607988616232*^9}}],
Cell[TextData[{
"Rule: If ",
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"A", " ",
RowBox[{"(",
RowBox[{"m", "+", "2"}], ")"}]}], "+",
RowBox[{"C",
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}]}]}], "\[Equal]", "0"}]]],
", then"
}], "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.4964417379912624`*^9, 3.4964417471112747`*^9}, {
3.496441910111503*^9, 3.4964419275315275`*^9}, 3.496451213764926*^9,
3.496528833243797*^9, {3.4975777080419827`*^9, 3.4975777244120054`*^9}, {
3.4975778737222147`*^9, 3.4975778945722437`*^9}, {3.4976396822792068`*^9,
3.49763968986082*^9}, {3.497639771433363*^9, 3.49763978104298*^9}, {
3.4976638984111347`*^9, 3.4976639153215647`*^9}, {3.4976645939383564`*^9,
3.497664598805565*^9}, {3.4976646480080514`*^9, 3.4976646992229414`*^9}, {
3.4976647966763124`*^9, 3.497664832415975*^9}, 3.497664903037299*^9, {
3.4986779242986293`*^9, 3.498677947778662*^9}, {3.499179738750054*^9,
3.499179740902858*^9}, {3.499213316063504*^9, 3.4992133345435305`*^9}, {
3.499358051967739*^9, 3.4993580717017736`*^9}, {3.4993592718267775`*^9,
3.4993592794067883`*^9}, {3.499363873578274*^9, 3.4993638796182823`*^9}, {
3.50031965968463*^9, 3.5003196639146357`*^9}, {3.500345120088499*^9,
3.500345127428509*^9}, {3.500410576940289*^9, 3.5004105779663477`*^9}, {
3.5004106327664824`*^9, 3.500410643898119*^9}, {3.500429569940626*^9,
3.500429571675726*^9}, {3.503421192847375*^9, 3.503421192847375*^9}, {
3.5034383255889688`*^9, 3.5034383282289724`*^9}, {3.504331822596939*^9,
3.5043318234969406`*^9}, {3.504988941601285*^9, 3.504988942181286*^9},
3.5087861934230595`*^9, 3.509482964630208*^9, {3.509936156008872*^9,
3.5099361567288733`*^9}, {3.510505182442281*^9, 3.510505183128682*^9}, {
3.512074844314452*^9, 3.5120748451244535`*^9}, 3.514614982497452*^9, {
3.514641288021989*^9, 3.514641289753592*^9}, {3.5146414380210533`*^9,
3.514641438286254*^9}, {3.514652945017925*^9, 3.514652945327925*^9}, {
3.5165642587977285`*^9, 3.5165642592877293`*^9}, 3.516564792622958*^9, {
3.5165899054683557`*^9, 3.5165899061283565`*^9}, 3.5468776988488674`*^9, {
3.5472366029866524`*^9, 3.5472366029866524`*^9}, {3.5630499536991377`*^9,
3.5630499543791385`*^9}, {3.5791144464702005`*^9,
3.5791144464702005`*^9}, {3.5791150486210437`*^9,
3.5791150486210437`*^9}, {3.5791240965844135`*^9,
3.5791240965844135`*^9}, {3.606606540094204*^9, 3.606606540094204*^9}, {
3.606607319315295*^9, 3.606607319315295*^9}, {3.6066080203862762`*^9,
3.6066080203862762`*^9}, {3.660089090670634*^9, 3.660089090670634*^9}, {
3.6600988517199335`*^9, 3.6600988517199335`*^9}, {3.6601006995476236`*^9,
3.6601006995476236`*^9}}],
Cell[BoxData[
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], ")"}], "m"],
RowBox[{"(",
RowBox[{"A", "+",
RowBox[{"C", " ",
SuperscriptBox[
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}], "2"]}]}], ")"}],
RowBox[{"\[DifferentialD]",
RowBox[{"x", " ", "\[LongRightArrow]", " ",
FractionBox[
RowBox[{"A", " ",
RowBox[{"Cos", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}],
SuperscriptBox[
RowBox[{"(",
RowBox[{"b", " ",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", " ", "x"}]}], "]"}]}], ")"}],
RowBox[{"m", "+", "1"}]]}],
RowBox[{"b", " ", "f", " ",
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}]}]]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9,
3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9,
3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9,
3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9,
3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9},
3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.496441851501421*^9,
3.496441872881451*^9}, {3.496528916553913*^9, 3.4965289272239285`*^9}, {
3.497576165747217*^9, 3.4975761801372375`*^9}, {3.497577761382057*^9,
3.4975777938921027`*^9}, 3.49763959300025*^9, 3.497639634480723*^9,
3.4976398417426867`*^9, {3.49766381031778*^9, 3.4976638350282235`*^9}, {
3.49766435104593*^9, 3.497664390373599*^9}, {3.4976647278489914`*^9,
3.4976647419046164`*^9}, {3.497664869980841*^9, 3.497664887437272*^9}, {
3.498761171082196*^9, 3.498761171082196*^9}, {3.4987645684369526`*^9,
3.4987646442070584`*^9}, {3.49883740188522*^9, 3.4988375207310295`*^9}, {
3.498837939529365*^9, 3.498837958467798*^9}, 3.498875518717125*^9, {
3.4991794250335026`*^9, 3.499179452879552*^9}, {3.4991796787211485`*^9,
3.499179681529153*^9}, {3.4991961982482667`*^9, 3.4991962392763386`*^9}, {
3.499196653100665*^9, 3.4991966955639396`*^9}, {3.499197135282312*^9,
3.499197176918785*^9}, {3.499197690444487*^9, 3.499197694048094*^9}, {
3.499212356332161*^9, 3.4992123865622034`*^9}, {3.499212421412252*^9,
3.499212423032254*^9}, {3.4992126233625345`*^9, 3.499212696332637*^9}, {
3.499357348905704*^9, 3.4993574380910606`*^9}, {3.4993588274861555`*^9,
3.4993589039462624`*^9}, {3.499359110096551*^9, 3.4993591137965565`*^9}, {
3.4993752824791145`*^9, 3.4993752993591385`*^9}, {3.4994041904561324`*^9,
3.4994041927361355`*^9}, {3.499404246686211*^9, 3.499404275156251*^9}, {
3.499404742476905*^9, 3.4994047525269194`*^9}, {3.500317978262911*^9,
3.500317979417313*^9}, 3.500318137887991*^9, {3.5013559487293763`*^9,
3.501355958849391*^9}, {3.502675715869453*^9, 3.502675816299594*^9}, {
3.5026759394697657`*^9, 3.50267594261977*^9}, {3.502676353440346*^9,
3.50267644207047*^9}, {3.5040325316737633`*^9, 3.504032555885006*^9},
3.5040712495285273`*^9, 3.5056768305258074`*^9, {3.5091340250266056`*^9,
3.5091340255166063`*^9}, {3.509134110686725*^9, 3.509134210656865*^9},
3.5091358140991096`*^9, {3.5091363851499095`*^9, 3.5091363926999197`*^9}, {
3.5091366480802774`*^9, 3.509136673460313*^9}, {3.509136756420429*^9,
3.509136781060464*^9}, {3.509136898910629*^9, 3.509136952490704*^9},
3.509137023530803*^9, {3.5091371495009794`*^9, 3.509137183211027*^9}, {
3.5091372666811438`*^9, 3.5091373023411937`*^9}, {3.509137374621295*^9,
3.5091373799413023`*^9}, {3.5091374289113708`*^9,
3.5091374307213736`*^9}, {3.509154869729108*^9, 3.5091548849591293`*^9}, {
3.509154923779184*^9, 3.509154943939212*^9}, 3.5091550691693873`*^9, {
3.5091550996494303`*^9, 3.5091551134994497`*^9}, {3.509155210989586*^9,
3.5091552779496794`*^9}, {3.509155484369969*^9, 3.5091554935699816`*^9}, {
3.509156447241317*^9, 3.5091565172614145`*^9}, {3.509157219352398*^9,
3.5091572214624004`*^9}, {3.509200648372362*^9, 3.509200660899184*^9}, {
3.5092402115853205`*^9, 3.5092402329885583`*^9}, {3.509240301316678*^9,
3.509240304764284*^9}, {3.509240391219636*^9, 3.5092403955564437`*^9},
3.509479727927079*^9, {3.509479774026716*^9, 3.5094797761458373`*^9}, {
3.509479865673958*^9, 3.5094799080873833`*^9}, 3.5094801863542995`*^9, {
3.5101615196270494`*^9, 3.5101615236518564`*^9}, {3.510161654707687*^9,
3.5101616568604903`*^9}, {3.5101619292841697`*^9, 3.510161930812972*^9}, {
3.510161988657874*^9, 3.5101619894222755`*^9}, {3.5151898848059206`*^9,
3.515189886945924*^9}, {3.5165643357978363`*^9, 3.5165643884979105`*^9}, {
3.516564434357974*^9, 3.516564521108096*^9}, {3.516564601038223*^9,
3.5165646230342617`*^9}, {3.546876826027645*^9, 3.5468768405676656`*^9}, {
3.546878099429428*^9, 3.546878112839447*^9}, {3.5472374052677755`*^9,
3.547237420127796*^9}, 3.547237631298092*^9, 3.606606277123836*^9, {
3.6066063375839205`*^9, 3.6066063376339207`*^9}, {3.606606505924156*^9,
3.6066065082841597`*^9}, {3.6066065889142723`*^9,
3.6066065889642725`*^9}, {3.606607034114896*^9, 3.606607047334914*^9}, {
3.6155110612696486`*^9, 3.6155110613096485`*^9}, 3.6155112729567494`*^9, {
3.6600987662780466`*^9, 3.6600988245123777`*^9}, {3.660098936584788*^9,
3.660098945418293*^9}, {3.660098979556246*^9, 3.6600989878277187`*^9}, {
3.6600990181924553`*^9, 3.660099044738974*^9}, {3.660099079305951*^9,
3.660099079476961*^9}, {3.6600991262676373`*^9, 3.660099149106943*^9},
3.660100503412405*^9, {3.6601007041108847`*^9, 3.6601007055589676`*^9}},
TextAlignment->Center,
FontSize->12,
FontWeight->"Bold"],
Cell["Program code:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9,
3.492805165713872*^9}, {3.509479967012754*^9, 3.5094799793114576`*^9}, {
3.660100543766713*^9, 3.660100548191966*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"b_.", "*",
RowBox[{"sin", "[",
RowBox[{"e_.", "+",
RowBox[{"f_.", "*", "x_"}]}], "]"}]}], ")"}], "^", "m_."}], "*",
RowBox[{"(",
RowBox[{"A_", "+",
RowBox[{"C_.", "*",
RowBox[{
RowBox[{"sin", "[",
RowBox[{"e_.", "+",
RowBox[{"f_.", "*", "x_"}]}], "]"}], "^", "2"}]}]}], ")"}]}], ",",
"x_Symbol"}], "]"}], " ", ":=", "\n", " ",
RowBox[{
RowBox[{"A", "*",
RowBox[{"Cos", "[",
RowBox[{"e", "+",
RowBox[{"f", "*", "x"}]}], "]"}], "*",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"b", "*",
RowBox[{"Sin", "[",
RowBox[{"e", "+",
RowBox[{"f", "*", "x"}]}], "]"}]}], ")"}], "^",
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}]}], "/",
RowBox[{"(",
RowBox[{"b", "*", "f", "*",
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}]}], ")"}]}]}], " ", "/;", "\n",
RowBox[{
RowBox[{"FreeQ", "[",
RowBox[{
RowBox[{"{",
RowBox[{"b", ",", "e", ",", "f", ",", "A", ",", "C", ",", "m"}], "}"}],
",", "x"}], "]"}], " ", "&&", " ",
RowBox[{"EqQ", "[",
RowBox[{
RowBox[{
RowBox[{"A", "*",
RowBox[{"(",
RowBox[{"m", "+", "2"}], ")"}]}], "+",
RowBox[{"C", "*",
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}]}]}], ",", "0"}], "]"}]}]}]}]], "Code",
CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9},
3.496441834031397*^9, 3.496442095051762*^9, 3.496528791863739*^9,
3.496528888643874*^9, 3.497575939976901*^9, 3.4975761146971455`*^9,
3.4975775509417624`*^9, 3.497577752792045*^9, 3.4975834953320856`*^9,
3.4976395861674376`*^9, 3.4976397432129135`*^9, 3.4976633737510133`*^9,
3.497663791067346*^9, 3.497664242469739*^9, {3.49766439658241*^9,
3.497664398470013*^9}, 3.497664769079864*^9, {3.4986774515679674`*^9,
3.49867746046798*^9}, {3.498761171092196*^9, 3.4987611711021957`*^9}, {
3.4987647642072268`*^9, 3.4987647797772484`*^9}, {3.4987662584793186`*^9,
3.498766258909319*^9}, {3.4987729599087005`*^9, 3.4987729607687016`*^9},
3.4988018581019883`*^9, {3.499179579551774*^9, 3.4991796094414263`*^9}, {
3.499179689157567*^9, 3.499179691637971*^9}, {3.4991797663621025`*^9,
3.499179767407304*^9}, {3.499179868308281*^9, 3.499179869805884*^9},
3.499180259000168*^9, {3.499197395157969*^9, 3.499197401054779*^9}, {
3.499212499112361*^9, 3.49921251269238*^9}, {3.499212715522664*^9,
3.4992127382126956`*^9}, {3.4992128038327875`*^9,
3.4992128061327906`*^9}, {3.499213982604438*^9, 3.499214025174497*^9}, {
3.499214066304555*^9, 3.499214072114563*^9}, {3.4992145411652193`*^9,
3.4992145475152283`*^9}, 3.4993574899767523`*^9, {3.4993576909831047`*^9,
3.4993577157403483`*^9}, 3.4993578086385117`*^9, {3.4993579390391407`*^9,
3.4993579651067867`*^9}, {3.4993580774113836`*^9, 3.4993580785501857`*^9},
3.499358991716386*^9, {3.4993590256364326`*^9, 3.499359034196445*^9},
3.499359158156618*^9, {3.499359230066719*^9, 3.4993592406667337`*^9}, {
3.499363855658249*^9, 3.499363864218261*^9}, {3.4993753165091624`*^9,
3.499375327739178*^9}, {3.500317979448513*^9, 3.500317979729314*^9}, {
3.500318356413175*^9, 3.5003183706092*^9}, {3.500319044263768*^9,
3.5003190515337787`*^9}, {3.500321448217134*^9, 3.5003214542871428`*^9}, {
3.500432003250804*^9, 3.5004320043278656`*^9}, {3.5010431659740324`*^9,
3.5010431675511227`*^9}, {3.5013560814295626`*^9,
3.5013561004895887`*^9}, {3.50135618678971*^9, 3.5013562181997538`*^9}, {
3.5013562556298065`*^9, 3.5013562631598167`*^9}, {3.5013563481499357`*^9,
3.501356350129938*^9}, {3.5013563916299963`*^9, 3.501356393369999*^9},
3.501356538350202*^9, {3.5013565824102635`*^9, 3.5013565889502726`*^9},
3.502675840959628*^9, {3.5026759066297197`*^9, 3.502675919529738*^9}, {
3.5026760125798683`*^9, 3.5026760334598975`*^9}, {3.5026762053901386`*^9,
3.5026762059201393`*^9}, {3.5026762389901853`*^9, 3.5026762460801954`*^9},
3.5026764690205073`*^9, {3.502676562960639*^9, 3.5026765748706555`*^9}, {
3.502676709910845*^9, 3.502676745080894*^9}, {3.502677686692212*^9,
3.5026776934822216`*^9}, {3.5027670612250915`*^9,
3.5027670636898956`*^9}, {3.503071936858197*^9, 3.5030719454782095`*^9},
3.50319810512*^9, {3.503549703821251*^9, 3.503549709891259*^9},
3.50387619429158*^9, {3.5051554747458277`*^9, 3.5051554812558365`*^9},
3.505344641353784*^9, {3.5053446929738564`*^9, 3.505344714963887*^9},
3.505353544425192*^9, {3.50924009739312*^9, 3.509240125441969*^9}, {
3.509240420719288*^9, 3.509240479234991*^9}, {3.5092405242254696`*^9,
3.509240529685479*^9}, 3.509240560292733*^9, 3.5092406309608574`*^9, {
3.509240739193847*^9, 3.5092407562290773`*^9}, {3.5094733083539004`*^9,
3.50947331918552*^9}, {3.509475162067927*^9, 3.509475162249937*^9},
3.509475333159713*^9, {3.5094799670517564`*^9, 3.5094799740681577`*^9},
3.5094800542107415`*^9, {3.509480699247636*^9, 3.5094807001776886`*^9}, {
3.509481029697536*^9, 3.509481029902548*^9}, {3.5094811407088857`*^9,